﻿Public Class DataCommon

    Public Shared Function DBNullCheck(ByVal obj As Object) As Object
        DBNullCheck = Nothing
        Try
            DBNullCheck = IIf(IsDBNull(obj), "", obj)
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Function
End Class
